home *** CD-ROM | disk | FTP | other *** search
/ BCI NET 2 / BCI NET 2.iso / archives / programming / amos / amoslist-0295.lzh / AMOSLIST / text0148.txt < prev    next >
Encoding:
Text File  |  1995-03-01  |  549 b   |  19 lines
  1.     When you want to copy two arrays use the following:
  2.     
  3.         Dim a(n),b(n)
  4.         Copy Varptr(a(0)),Varptr(a(0))+n*4 to varptr(b(0))
  5.         
  6.         Try it.It's ultra fast.Try to compare it with:
  7.         For x=1 to n
  8.             b(x)=a(x)
  9.         Next
  10.         
  11.         When you want to initialize an array just use:
  12.             Fill varptr(a(0)) to varptr(a(0))+n*4,0 ; fill it with 0
  13.        
  14.         You will notice the difference!
  15.         
  16.         Also deek(varptr(a(0))-4) gives N!
  17.                                             Gregory.
  18.  
  19.